home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 7 / CD FunHouse 7 For The Macintosh (Wayzata)(1992).iso / • The Arcade • / Scarab of Ra ••••• / Scarab of RA / Scarab of RA.rsrc / CODE_18.txt < prev    next >
Text File  |  1987-12-16  |  13KB  |  232 lines
  1. # near model CODE resource
  2. # jump table entries: 33601-33602 (2 of them)
  3. export_104:
  4. 00000000  4E56 FFF8                link       A6, -0x0008
  5. 00000004  42AE FFF8                clr.l      [A6 - 0x8]
  6. 00000008  3F3C 0001                move.w     -[A7], 0x1
  7. 0000000C  3F3C 0002                move.w     -[A7], 0x2
  8. 00000010  4EAD 008A                jsr        [A5 + 0x8A /* export_13 */]
  9. 00000014  588F                     addq.l     A7, 4
  10. 00000016  0C40 0002                cmpi.w     D0, 0x2
  11. 0000001A  673E                     beq        +0x40 /* 0000005A */
  12. 0000001C  4879 0000 114A           push.l     0x114A
  13. 00000022  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  14. 00000026  588F                     addq.l     A7, 4
  15. 00000028  302D E7F4                move.w     D0, [A5 - 0x180C]
  16. 0000002C  48C0                     ext.l      D0
  17. 0000002E  E980                     asl        D0, 4
  18. 00000030  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  19. 00000034  D1C0                     add.l      A0, D0
  20. 00000036  226E 0008                movea.l    A1, [A6 + 0x8]
  21. 0000003A  2F11                     move.l     -[A7], [A1]
  22. 0000003C  4868 0008                pea.l      [A0 + 0x8]
  23. 00000040  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  24. 00000044  508F                     addq.l     A7, 8
  25. 00000046  206E 0008                movea.l    A0, [A6 + 0x8]
  26. 0000004A  4290                     clr.l      [A0]
  27. 0000004C  3F2D E7F4                move.w     -[A7], [A5 - 0x180C]
  28. 00000050  4EAD 03DA                jsr        [A5 + 0x3DA /* export_119 */]
  29. 00000054  548F                     addq.l     A7, 2
  30. 00000056  6000 0258                bra        +0x25A /* 000002B0 */
  31. label0000005A:
  32. 0000005A  4AAE 000C                tst.l      [A6 + 0xC]
  33. 0000005E  6710                     beq        +0x12 /* 00000070 */
  34. 00000060  206E 000C                movea.l    A0, [A6 + 0xC]
  35. 00000064  3028 0004                move.w     D0, [A0 + 0x4]
  36. 00000068  B06E 0010                cmp.w      D0, [A6 + 0x10]
  37. 0000006C  6700 00A2                beq        +0xA4 /* 00000110 */
  38. label00000070:
  39. 00000070  302E 0010                move.w     D0, [A6 + 0x10]
  40. 00000074  48C0                     ext.l      D0
  41. 00000076  E980                     asl        D0, 4
  42. 00000078  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  43. 0000007C  D1C0                     add.l      A0, D0
  44. 0000007E  4879 0010 0000           push.l     0x100000
  45. 00000084  2F28 0008                move.l     -[A7], [A0 + 0x8]
  46. 00000088  4EAD 00A2                jsr        [A5 + 0xA2 /* export_16 */]
  47. 0000008C  508F                     addq.l     A7, 8
  48. 0000008E  2D40 FFF8                move.l     [A6 - 0x8], D0
  49. 00000092  6018                     bra        +0x1A /* 000000AC */
  50. label00000094:
  51. 00000094  4879 0010 0000           push.l     0x100000
  52. 0000009A  206E FFF8                movea.l    A0, [A6 - 0x8]
  53. 0000009E  2F28 0014                move.l     -[A7], [A0 + 0x14]
  54. 000000A2  4EAD 00A2                jsr        [A5 + 0xA2 /* export_16 */]
  55. 000000A6  508F                     addq.l     A7, 8
  56. 000000A8  2D40 FFF8                move.l     [A6 - 0x8], D0
  57. label000000AC:
  58. 000000AC  4AAE FFF8                tst.l      [A6 - 0x8]
  59. 000000B0  670C                     beq        +0xE /* 000000BE */
  60. 000000B2  206E FFF8                movea.l    A0, [A6 - 0x8]
  61. 000000B6  0C28 0001 0006           cmpi.b     [A0 + 0x6], 0x1
  62. 000000BC  66D6                     bne        -0x28 /* 00000094 */
  63. label000000BE:
  64. 000000BE  4AAE FFF8                tst.l      [A6 - 0x8]
  65. 000000C2  664C                     bne        +0x4E /* 00000110 */
  66. 000000C4  302E 0010                move.w     D0, [A6 + 0x10]
  67. 000000C8  48C0                     ext.l      D0
  68. 000000CA  E980                     asl        D0, 4
  69. 000000CC  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  70. 000000D0  D1C0                     add.l      A0, D0
  71. 000000D2  4879 0010 0000           push.l     0x100000
  72. 000000D8  2F28 0008                move.l     -[A7], [A0 + 0x8]
  73. 000000DC  4EAD 00A2                jsr        [A5 + 0xA2 /* export_16 */]
  74. 000000E0  508F                     addq.l     A7, 8
  75. 000000E2  2D40 FFF8                move.l     [A6 - 0x8], D0
  76. 000000E6  6018                     bra        +0x1A /* 00000100 */
  77. label000000E8:
  78. 000000E8  4879 0010 0000           push.l     0x100000
  79. 000000EE  206E FFF8                movea.l    A0, [A6 - 0x8]
  80. 000000F2  2F28 0014                move.l     -[A7], [A0 + 0x14]
  81. 000000F6  4EAD 00A2                jsr        [A5 + 0xA2 /* export_16 */]
  82. 000000FA  508F                     addq.l     A7, 8
  83. 000000FC  2D40 FFF8                move.l     [A6 - 0x8], D0
  84. label00000100:
  85. 00000100  4AAE FFF8                tst.l      [A6 - 0x8]
  86. 00000104  670A                     beq        +0xC /* 00000110 */
  87. 00000106  206E FFF8                movea.l    A0, [A6 - 0x8]
  88. 0000010A  4A28 0006                tst.b      [A0 + 0x6]
  89. 0000010E  66D8                     bne        -0x26 /* 000000E8 */
  90. label00000110:
  91. 00000110  4AAE 000C                tst.l      [A6 + 0xC]
  92. 00000114  6756                     beq        +0x58 /* 0000016C */
  93. 00000116  206E 000C                movea.l    A0, [A6 + 0xC]
  94. 0000011A  3028 0004                move.w     D0, [A0 + 0x4]
  95. 0000011E  B06E 0010                cmp.w      D0, [A6 + 0x10]
  96. 00000122  6748                     beq        +0x4A /* 0000016C */
  97. 00000124  4AAE FFF8                tst.l      [A6 - 0x8]
  98. 00000128  6642                     bne        +0x44 /* 0000016C */
  99. 0000012A  4879 0000 1192           push.l     0x1192
  100. 00000130  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  101. 00000134  588F                     addq.l     A7, 4
  102. 00000136  302E 0010                move.w     D0, [A6 + 0x10]
  103. 0000013A  48C0                     ext.l      D0
  104. 0000013C  E980                     asl        D0, 4
  105. 0000013E  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  106. 00000142  D1C0                     add.l      A0, D0
  107. 00000144  226E 0008                movea.l    A1, [A6 + 0x8]
  108. 00000148  2F11                     move.l     -[A7], [A1]
  109. 0000014A  4868 0008                pea.l      [A0 + 0x8]
  110. 0000014E  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  111. 00000152  508F                     addq.l     A7, 8
  112. 00000154  206E 0008                movea.l    A0, [A6 + 0x8]
  113. 00000158  4290                     clr.l      [A0]
  114. 0000015A  3F2D E7F6                move.w     -[A7], [A5 - 0x180A]
  115. 0000015E  3F2D E7F4                move.w     -[A7], [A5 - 0x180C]
  116. 00000162  4EAD 00D2                jsr        [A5 + 0xD2 /* export_22 */]
  117. 00000166  588F                     addq.l     A7, 4
  118. 00000168  6000 0146                bra        +0x148 /* 000002B0 */
  119. label0000016C:
  120. 0000016C  4AAE FFF8                tst.l      [A6 - 0x8]
  121. 00000170  6706                     beq        +0x8 /* 00000178 */
  122. 00000172  2D6E FFF8 000C           move.l     [A6 + 0xC], [A6 - 0x8]
  123. label00000178:
  124. 00000178  4AAE 000C                tst.l      [A6 + 0xC]
  125. 0000017C  6700 0132                beq        +0x134 /* 000002B0 */
  126. 00000180  206E 000C                movea.l    A0, [A6 + 0xC]
  127. 00000184  3028 0004                move.w     D0, [A0 + 0x4]
  128. 00000188  B06E 0010                cmp.w      D0, [A6 + 0x10]
  129. 0000018C  6600 0122                bne        +0x124 /* 000002B0 */
  130. 00000190  206E 000C                movea.l    A0, [A6 + 0xC]
  131. 00000194  0828 0007 0009           btst.b     [A0 + 0x9], 0x7
  132. 0000019A  6742                     beq        +0x44 /* 000001DE */
  133. 0000019C  4879 0000 11AC           push.l     0x11AC
  134. 000001A2  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  135. 000001A6  588F                     addq.l     A7, 4
  136. 000001A8  302E 0010                move.w     D0, [A6 + 0x10]
  137. 000001AC  48C0                     ext.l      D0
  138. 000001AE  E980                     asl        D0, 4
  139. 000001B0  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  140. 000001B4  D1C0                     add.l      A0, D0
  141. 000001B6  226E 0008                movea.l    A1, [A6 + 0x8]
  142. 000001BA  2F11                     move.l     -[A7], [A1]
  143. 000001BC  4868 0008                pea.l      [A0 + 0x8]
  144. 000001C0  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  145. 000001C4  508F                     addq.l     A7, 8
  146. 000001C6  206E 0008                movea.l    A0, [A6 + 0x8]
  147. 000001CA  4290                     clr.l      [A0]
  148. 000001CC  3F2D E7F6                move.w     -[A7], [A5 - 0x180A]
  149. 000001D0  3F2D E7F4                move.w     -[A7], [A5 - 0x180C]
  150. 000001D4  4EAD 00D2                jsr        [A5 + 0xD2 /* export_22 */]
  151. 000001D8  588F                     addq.l     A7, 4
  152. 000001DA  6000 00D4                bra        +0xD6 /* 000002B0 */
  153. label000001DE:
  154. 000001DE  206E 000C                movea.l    A0, [A6 + 0xC]
  155. 000001E2  0C28 0002 0006           cmpi.b     [A0 + 0x6], 0x2
  156. 000001E8  6700 00C6                beq        +0xC8 /* 000002B0 */
  157. 000001EC  302D E7F4                move.w     D0, [A5 - 0x180C]
  158. 000001F0  48C0                     ext.l      D0
  159. 000001F2  E980                     asl        D0, 4
  160. 000001F4  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  161. 000001F8  D1C0                     add.l      A0, D0
  162. 000001FA  226E 000C                movea.l    A1, [A6 + 0xC]
  163. 000001FE  3029 0004                move.w     D0, [A1 + 0x4]
  164. 00000202  48C0                     ext.l      D0
  165. 00000204  E980                     asl        D0, 4
  166. 00000206  43ED 9B58                lea.l      A1, [A5 - 0x64A8]
  167. 0000020A  D3C0                     add.l      A1, D0
  168. 0000020C  3028 0006                move.w     D0, [A0 + 0x6]
  169. 00000210  9069 0006                sub.w      D0, [A1 + 0x6]
  170. 00000214  3D40 FFFC                move.w     [A6 - 0x4], D0
  171. 00000218  306E FFFC                movea.w    A0, [A6 - 0x4]
  172. 0000021C  2008                     move.l     D0, A0
  173. 0000021E  81FC 0002                divs.w     D0, 0x2
  174. 00000222  5240                     addq.w     D0, 1
  175. 00000224  3F00                     move.w     -[A7], D0
  176. 00000226  4EAD 0572                jsr        [A5 + 0x572 /* export_170 */]
  177. 0000022A  548F                     addq.l     A7, 2
  178. 0000022C  4A40                     tst.w      D0
  179. 0000022E  6668                     bne        +0x6A /* 00000298 */
  180. 00000230  4879 0000 11EE           push.l     0x11EE
  181. 00000236  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  182. 0000023A  588F                     addq.l     A7, 4
  183. 0000023C  3F3C 0001                move.w     -[A7], 0x1
  184. 00000240  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  185. 00000244  486D 95DE                pea.l      [A5 - 0x6A22]
  186. 00000248  4EAD 050A                jsr        [A5 + 0x50A /* export_157 */]
  187. 0000024C  4FEF 000A                lea.l      A7, [A7 + 0xA]
  188. 00000250  4879 0000 11FA           push.l     0x11FA
  189. 00000256  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  190. 0000025A  588F                     addq.l     A7, 4
  191. 0000025C  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  192. 00000260  4EAD 00EA                jsr        [A5 + 0xEA /* export_25 */]
  193. 00000264  588F                     addq.l     A7, 4
  194. 00000266  206E 0008                movea.l    A0, [A6 + 0x8]
  195. 0000026A  2F10                     move.l     -[A7], [A0]
  196. 0000026C  4EAD 05AA                jsr        [A5 + 0x5AA /* export_177 */]
  197. 00000270  588F                     addq.l     A7, 4
  198. 00000272  206E 0008                movea.l    A0, [A6 + 0x8]
  199. 00000276  4290                     clr.l      [A0]
  200. 00000278  3F2D E7F6                move.w     -[A7], [A5 - 0x180A]
  201. 0000027C  3F2D E7F4                move.w     -[A7], [A5 - 0x180C]
  202. 00000280  4EAD 00D2                jsr        [A5 + 0xD2 /* export_22 */]
  203. 00000284  588F                     addq.l     A7, 4
  204. 00000286  06AD 0000 0096 E7EC      addi.l     [A5 - 0x1814], 0x96
  205. 0000028E  4267                     clr.w      -[A7]
  206. 00000290  4EAD 04CA                jsr        [A5 + 0x4CA /* export_149 */]
  207. 00000294  548F                     addq.l     A7, 2
  208. 00000296  6018                     bra        +0x1A /* 000002B0 */
  209. label00000298:
  210. 00000298  4879 0000 11FE           push.l     0x11FE
  211. 0000029E  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  212. 000002A2  588F                     addq.l     A7, 4
  213. 000002A4  4879 0000 1224           push.l     0x1224
  214. 000002AA  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  215. 000002AE  588F                     addq.l     A7, 4
  216. label000002B0:
  217. 000002B0  4E5E                     unlink     A6
  218. 000002B2  4E75                     rts
  219. 000002B4  4E45                     trap       5
  220. 000002B6  5420                     addq.b     -[A0], 2
  221. 000002B8  2020                     move.l     D0, -[A0]
  222. 000002BA  2020                     move.l     D0, -[A0]
  223. export_105:
  224. 000002BC  4E56 0000                link       A6, 0
  225. 000002C0  4EAD 014A                jsr        [A5 + 0x14A /* export_37 */]
  226. 000002C4  4E5E                     unlink     A6
  227. 000002C6  4E75                     rts
  228. 000002C8  5553                     subq.w     [A3], 2
  229. 000002CA  454E                     chk.w      D2, A6
  230. 000002CC  4554                     chk.w      D2, [A4]
  231. 000002CE  2020                     move.l     D0, -[A0]
  232.